Simplify test for empty list

* which-key.el (which-key--show-keymap):  Use (null)

diff --git a/which-key.el b/which-key.el
index 45301725704e1c382c995b936942c1fb8ddd6a22..2e3f6cb7f9c34a473be3d32de169a78e42942208 100644 (file)
--- a/which-key.el
+++ b/which-key.el
@@ -2605,7 +2605,7 @@ KEYMAP is selected interactively by mode in
     (keymap-name keymap &optional prior-args all no-paging filter)
   (when prior-args (push prior-args which-key--prior-show-keymap-args))
   (let ((bindings (which-key--get-bindings nil keymap filter all)))
-    (if (= (length bindings) 0)
+    (if (null bindings)
         (message "which-key: No bindings found in %s" keymap-name)
       (cond ((listp which-key-side-window-location)
              (setq which-key--last-try-2-loc